home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / comm / cnet / cnettoolkit2a.lha / Routines / CHECK < prev    next >
Text File  |  1994-12-13  |  254b  |  7 lines
  1. CHECK:;if ARG() & ARG(1)~='###PANIC' then return ARG(1)
  2.     getcarrier;if result='TRUE' then if ARG() then return ARG(1);else return
  3.  
  4.     /* You may wish to call SAVE DATA routines here, before exiting! */
  5.  
  6.     logentry 'Lost Carrier!!';bufferflush;exit
  7.